﻿
Partial Class WebForm_ManageMOICodeMapping_AddMOICodemapping
    Inherits System.Web.UI.UserControl

    Public Sub BindData()

        Dim dat As New clsData
        Dim sql As New MyStringBuilder

        sql.Length = 0

        sql.AppendFormat(" Select * From CodeMapping ")
        sql.AppendFormat(" Where 1=1 ")
        sql.AppendFormat(" And TableName='{0}' ", Me.TableName)
        sql.AppendFormat(" And ColumnName='{0}' ", Me.ColumnName)
        sql.AppendFormat(" And Value='{0}' ", Me.CodeMappingValue)

        Me.fv.DataSource = dat.GetData(sql)
        Me.fv.DataBind()

    End Sub

    Public Property TableName() As String
        Get
            Return ViewState("TableName")
        End Get
        Set(ByVal value As String)
            ViewState("TableName") = value
        End Set
    End Property

    Public Property ColumnName() As String
        Get
            Return ViewState("ColumnName")
        End Get
        Set(ByVal value As String)
            ViewState("ColumnName") = value
        End Set
    End Property

    Public Property CodeMappingValue() As String
        Get
            Return ViewState("CodeMappingValue")
        End Get
        Set(ByVal value As String)
            ViewState("CodeMappingValue") = value
        End Set
    End Property
End Class
